home *** CD-ROM | disk | FTP | other *** search
/ Developer CD Series 1994 August: Tool Chest / Dev.CD Aug 94.toast / Sample Code / Snippets / Toolbox / Simple HLE / HLE.r < prev    next >
Encoding:
Text File  |  1992-07-15  |  2.5 KB  |  173 lines  |  [TEXT/MPS ]
  1. #include "types.r"
  2. resource 'MENU' (128, preload) {
  3.     128,
  4.     textMenuProc,
  5.     0x7FFFFFFD,
  6.     enabled,
  7.     apple,
  8.     {    /* array: 2 elements */
  9.         /* [1] */
  10.         "About", noIcon, noKey, noMark, plain,
  11.         /* [2] */
  12.         "-", noIcon, noKey, noMark, plain
  13.     }
  14. };
  15.  
  16. resource 'MENU' (129, preload) {
  17.     129,
  18.     textMenuProc,
  19.     0xFFF,
  20.     enabled,
  21.     "File",
  22.     {    /* array: 1 elements */
  23.         /* [1] */
  24.         "Quit", noIcon, "Q", noMark, plain
  25.     }
  26. };
  27.  
  28. resource 'MENU' (130, preload) {
  29.     130,
  30.     textMenuProc,
  31.     0x3400,
  32.     enabled,
  33.     "Edit",
  34.     {    /* array: 6 elements */
  35.         /* [1] */
  36.         "Undo", noIcon, "Z", noMark, plain,
  37.         /* [2] */
  38.         "-", noIcon, noKey, noMark, plain,
  39.         /* [3] */
  40.         "Cut", noIcon, "X", noMark, plain,
  41.         /* [4] */
  42.         "Copy", noIcon, "C", noMark, plain,
  43.         /* [5] */
  44.         "Paste", noIcon, "V", noMark, plain,
  45.         /* [6] */
  46.         "Clear", noIcon, noKey, noMark, plain
  47.     }
  48. };
  49.  
  50. resource 'MENU' (131) {
  51.     131,
  52.     textMenuProc,
  53.     0x7FFFFFDD,
  54.     enabled,
  55.     "Test Stuff",
  56.     {    /* array: 1 elements */
  57.         /* [1] */
  58.         "SendHLE", noIcon, noKey, noMark, plain
  59.     }
  60. };
  61.  
  62. resource 'ALRT' (128) {
  63.     {40, 40, 229, 363},
  64.     128,
  65.     {    /* array: 4 elements */
  66.         /* [1] */
  67.         OK, visible, sound1,
  68.         /* [2] */
  69.         OK, visible, sound1,
  70.         /* [3] */
  71.         OK, visible, sound1,
  72.         /* [4] */
  73.         OK, visible, sound1
  74.     }
  75. };
  76.  
  77. resource 'DITL' (128) {
  78.     {    /* array DITLarray: 4 elements */
  79.         /* [1] */
  80.         {164, 115, 184, 185},
  81.         Button {
  82.             enabled,
  83.             "OK"
  84.         },
  85.         /* [2] */
  86.         {5, 10, 43, 290},
  87.         StaticText {
  88.             disabled,
  89.             "The Simplest Shell"
  90.         },
  91.         /* [3] */
  92.         {76, 3, 154, 301},
  93.         StaticText {
  94.             disabled,
  95.             "FredWare from Apple Developer Technical "
  96.             "Support, ADS group.\nCopyright ©  1991 Ap"
  97.             "ple Computer Inc.\nWritten by C.K. Haun ("
  98.             "<TR>)."
  99.         },
  100.         /* [4] */
  101.         {53, 82, 71, 227},
  102.         StaticText {
  103.             disabled,
  104.             "version 1.0d1"
  105.         }
  106.     }
  107. };
  108.  
  109. resource 'MBAR' (128) {
  110.     {    /* array MenuArray: 4 elements */
  111.         /* [1] */
  112.         128,
  113.         /* [2] */
  114.         129,
  115.         /* [3] */
  116.         130,
  117.         /* [4] */
  118.         131
  119.     }
  120. };
  121.  
  122. resource 'WIND' (128) {
  123.     {40, 40, 310, 572},
  124.     documentProc,
  125.     visible,
  126.     noGoAway,
  127.     0x0,
  128.     "simple HLE "
  129. };
  130.  
  131. resource 'SIZE' (-1) {
  132.     reserved,
  133.     acceptSuspendResumeEvents,
  134.     reserved,
  135.     canBackground,
  136.     multiFinderAware,
  137.     backgroundAndForeground,
  138.     dontGetFrontClicks,
  139.     ignoreChildDiedEvents,
  140.     not32BitCompatible,
  141.     isHighLevelEventAware,
  142.     localAndRemoteHLEvents,
  143.     notStationeryAware,
  144.     dontUseTextEditServices,
  145.     reserved,
  146.     reserved,
  147.     reserved,
  148.     50000,
  149.     50000
  150. };
  151.  
  152. resource 'CNTL' (128) {
  153.     {10, 60, 30, 260},
  154.     0,
  155.     visible,
  156.     0,
  157.     0,
  158.     pushButProc,
  159.     0,
  160.     "Send Event"
  161. };
  162.  
  163. resource 'DLOG' (128) {
  164.     {40, 40, 240, 280},
  165.     documentProc,
  166.     visible,
  167.     goAway,
  168.     0x0,
  169.     128,
  170.     ""
  171. };
  172.  
  173.